function outsignal = truedelay(insignal,Fs,time,volume,feedback)
    mytime=round(time*Fs);
    outsignal=zeros(length(insignal),1);

    mytime=round(time*Fs);
    a=ceil(mytime*feedback*volume*20);
    outsignal=[insignal ; zeros(a,1)];
    for k=mytime+1:length(insignal)
        outsignal(k)=outsignal(k)+(insignal(k-mytime)*(1-feedback) + outsignal(k-mytime)*feedback)*volume;   
    end
    for k=length(insignal+1):length(outsignal);
        outsignal(k)=outsignal(k)+(outsignal(k-mytime)*feedback)*volume;   
    end

end